home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet multimedia / Muzyka / Edytory sampli (probek dzwieku) / ZynAddSubFX_2.2.0 / Setup_ZynAddSubFX-2.2.0.exe / source code / Misc / Util.C < prev    next >
C/C++ Source or Header  |  2005-03-19  |  3KB  |  113 lines
  1. /*
  2.   ZynAddSubFX - a software synthesizer
  3.  
  4.   Util.C - Miscellaneous functions
  5.   Copyright (C) 2002-2005 Nasca Octavian Paul
  6.   Author: Nasca Octavian Paul
  7.  
  8.   This program is free software; you can redistribute it and/or modify
  9.   it under the terms of version 2 of the GNU General Public License 
  10.   as published by the Free Software Foundation.
  11.  
  12.   This program is distributed in the hope that it will be useful,
  13.   but WITHOUT ANY WARRANTY; without even the implied warranty of
  14.   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15.   GNU General Public License (version 2) for more details.
  16.  
  17.   You should have received a copy of the GNU General Public License (version 2)
  18.   along with this program; if not, write to the Free Software Foundation,
  19.   Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  20.  
  21. */
  22.  
  23. #include "Util.h"
  24. #include <math.h>
  25. #include <stdio.h>
  26.  
  27. #include <sys/types.h>
  28. #include <sys/stat.h>
  29. #include <fcntl.h>
  30. #include <unistd.h>
  31. #include <errno.h>
  32. #include <string.h>
  33.  
  34. int SAMPLE_RATE=44100;
  35. int SOUND_BUFFER_SIZE=256;
  36. int OSCIL_SIZE=512;
  37.  
  38. Config config;
  39. REALTYPE *denormalkillbuf;
  40.  
  41.  
  42. /*
  43.  * Transform the velocity according the scaling parameter (velocity sensing)
  44.  */
  45. REALTYPE VelF(REALTYPE velocity,unsigned char scaling){
  46.     REALTYPE x;
  47.     x=pow(VELOCITY_MAX_SCALE,(64.0-scaling)/64.0);
  48.     if ((scaling==127)||(velocity>0.99)) return(1.0);
  49.        else return(pow(velocity,x));
  50. };
  51.  
  52. /*
  53.  * Get the detune in cents 
  54.  */
  55. REALTYPE getdetune(unsigned char type,unsigned short int coarsedetune,unsigned short int finedetune){
  56.     REALTYPE det=0.0,octdet=0.0,cdet=0.0,findet=0.0;
  57.     //Get Octave
  58.     int octave=coarsedetune/1024;
  59.     if (octave>=8) octave-=16;
  60.     octdet=octave*1200.0;
  61.  
  62.     //Coarse and fine detune
  63.     int cdetune=coarsedetune%1024;
  64.     if (cdetune>512) cdetune-=1024;
  65.     
  66.     int fdetune=finedetune-8192;
  67.  
  68.     switch (type){
  69. //    case 1: is used for the default (see below)
  70.     case 2:    cdet=fabs(cdetune*10.0);
  71.         findet=fabs(fdetune/8192.0)*10.0;
  72.         break;
  73.     case 3:    cdet=fabs(cdetune*100);
  74.         findet=pow(10,fabs(fdetune/8192.0)*3.0)/10.0-0.1;
  75.         break;
  76.     case 4:    cdet=fabs(cdetune*701.95500087);//perfect fifth
  77.         findet=(pow(2,fabs(fdetune/8192.0)*12.0)-1.0)/4095*1200;
  78.         break;
  79.       //case ...: need to update N_DETUNE_TYPES, if you'll add more
  80.     default:cdet=fabs(cdetune*50.0);
  81.         findet=fabs(fdetune/8192.0)*35.0;//almost like "Paul's Sound Designer 2"
  82.         break;
  83.     };
  84.     if (finedetune<8192) findet=-findet;
  85.     if (cdetune<0) cdet=-cdet;
  86.     
  87.     det=octdet+cdet+findet;
  88.     return(det);
  89. };
  90.  
  91.  
  92. bool fileexists(char *filename){
  93.     struct stat tmp;
  94.     int result=stat(filename,&tmp);
  95.     if (result>=0) return(true);
  96.     
  97.     return(false);
  98. };
  99.  
  100. void newFFTFREQS(FFTFREQS *f,int size){
  101.     f->c=new REALTYPE[size];
  102.     f->s=new REALTYPE[size];
  103.     for (int i=0;i<size;i++){
  104.     f->c[i]=0.0;f->s[i]=0.0;
  105.     };
  106. };
  107. void deleteFFTFREQS(FFTFREQS *f){
  108.     delete(f->c);
  109.     delete(f->s);
  110.     f->c=f->s=NULL;
  111. };
  112.  
  113.